package com.ruoyi.system.service.system.impl;

import cn.hutool.core.collection.CollUtil;
import cn.hutool.core.convert.Convert;
import cn.hutool.core.lang.Validator;
import com.baomidou.mybatisplus.core.conditions.query.LambdaQueryWrapper;
import com.baomidou.mybatisplus.core.conditions.query.QueryWrapper;
import com.baomidou.mybatisplus.core.conditions.update.LambdaUpdateWrapper;
import com.ruoyi.common.annotation.DataScope;
import com.ruoyi.common.constant.UserConstants;
import com.ruoyi.common.core.domain.entity.SysDept;
import com.ruoyi.common.core.domain.entity.SysDeptEventType;
import com.ruoyi.common.core.domain.entity.SysRole;
import com.ruoyi.common.core.domain.entity.SysUser;
import com.ruoyi.common.core.mybatisplus.core.ServicePlusImpl;
import com.ruoyi.common.exception.CustomException;
import com.ruoyi.common.exception.TransactionalException;
import com.ruoyi.system.domain.common.TreeSelect;
import com.ruoyi.system.mapper.system.SysDeptEventTypeMapper;
import com.ruoyi.system.mapper.system.SysDeptMapper;
import com.ruoyi.system.mapper.system.SysRoleMapper;
import com.ruoyi.system.mapper.system.SysUserMapper;
import com.ruoyi.system.service.system.ISysDeptService;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;

import java.util.ArrayList;
import java.util.Arrays;
import java.util.List;
import java.util.stream.Collectors;

/**
 * 部门管理 服务实现
 *
 * @author ruoyi
 */
@Service
public class SysDeptServiceImpl extends ServicePlusImpl<SysDeptMapper, SysDept, SysDept> implements ISysDeptService {

    @Autowired
    private SysRoleMapper roleMapper;

    @Autowired
    private SysUserMapper userMapper;

	@Autowired
	private SysDeptEventTypeMapper deptEventTypeMapper;

    /**
     * 查询部门管理数据
     *
     * @param dept 部门信息
     * @return 部门信息集合
     */
    @Override
    @DataScope(deptAlias = "d")
    public List<SysDept> selectDeptList(SysDept dept) {
        return baseMapper.selectDeptList(dept);
    }

    /**
     * 构建前端所需要树结构
     *
     * @param depts 部门列表
     * @return 树结构列表
     */
    @Override
    public List<SysDept> buildDeptTree(List<SysDept> depts) {
        List<SysDept> returnList = new ArrayList<SysDept>();
        List<Integer> tempList = new ArrayList<>();
        for (SysDept dept : depts) {
            tempList.add(dept.getDeptId());
        }
		for (SysDept dept : depts) {
			// 如果是顶级节点, 遍历该父节点的所有子节点
			if (!tempList.contains(dept.getParentId())) {
				recursionFn(depts, dept);
				returnList.add(dept);
			}
		}
        if (returnList.isEmpty()) {
            returnList = depts;
        }
        return returnList;
    }

    /**
     * 构建前端所需要下拉树结构
     *
     * @param depts 部门列表
     * @return 下拉树结构列表
     */
    @Override
    public List<TreeSelect> buildDeptTreeSelect(List<SysDept> depts) {
        List<SysDept> deptTrees = buildDeptTree(depts);
        return deptTrees.stream().map(TreeSelect::new).collect(Collectors.toList());
    }

    /**
     * 根据角色ID查询部门树信息
     *
     * @param roleId 角色ID
     * @return 选中部门列表
     */
    @Override
    public List<Integer> selectDeptListByRoleId(Integer roleId) {
        SysRole role = roleMapper.selectById(roleId);
        return baseMapper.selectDeptListByRoleId(roleId, role.isDeptCheckStrictly());
    }

    /**
     * 根据部门ID查询信息
     *
     * @param deptId 部门ID
     * @return 部门信息
     */
    @Override
    public SysDept selectDeptById(Integer deptId) {
        return getById(deptId);
    }

    /**
     * 根据ID查询所有子部门（正常状态）
     *
     * @param deptId 部门ID
     * @return 子部门数
     */
    @Override
    public long selectNormalChildrenDeptById(Integer deptId) {
        return count(new LambdaQueryWrapper<SysDept>()
                .eq(SysDept::getStatus, 0)
                .apply("find_in_set({0}, ancestors)", deptId));
    }

    /**
     * 是否存在子节点
     *
     * @param deptId 部门ID
     * @return 结果
     */
    @Override
    public boolean hasChildByDeptId(Integer deptId) {
		long result = count(new LambdaQueryWrapper<SysDept>()
                .eq(SysDept::getParentId, deptId)
                .last("limit 1"));
        return result > 0;
    }

    /**
     * 查询部门是否存在用户
     *
     * @param deptId 部门ID
     * @return 结果 true 存在 false 不存在
     */
    @Override
    public boolean checkDeptExistUser(Integer deptId) {
		long result = userMapper.selectCount(new LambdaQueryWrapper<SysUser>()
                .eq(SysUser::getDeptId, deptId));
        return result > 0;
    }

    /**
     * 校验部门名称是否唯一
     *
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    public String checkDeptNameUnique(SysDept dept) {
        Long deptId = Validator.isNull(dept.getDeptId()) ? -1L : dept.getDeptId();
        SysDept info = getOne(new LambdaQueryWrapper<SysDept>()
                .eq(SysDept::getDeptName, dept.getDeptName())
                .eq(SysDept::getParentId, dept.getParentId())
                .last("limit 1"));
        if (Validator.isNotNull(info) && info.getDeptId().longValue() != deptId.longValue()) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 新增保存部门信息
     *
     * @param dept 部门信息
     * @return 结果
     */
    @Override
	@Transactional
    public int insertDept(SysDept dept) {
		int ret = 0;
		try{
			SysDept info = getById(dept.getParentId());
			if(info != null){
				// 如果父节点不为正常状态,则不允许新增子节点
				if (!UserConstants.DEPT_NORMAL.equals(info.getStatus())) {
					throw new CustomException("部门停用，不允许新增");
				}
				dept.setAncestors(info.getAncestors() + "," + dept.getParentId());
			}else{
				dept.setAncestors(dept.getParentId()+"");
			}

			ret = baseMapper.insert(dept);
			if(ret <= 0){
				throw new TransactionalException("insertDept insert error");
			}
//			if(CollUtil.isNotEmpty(dept.getEventTypeIds())){
//				for (Integer typId : dept.getEventTypeIds()){
//					QueryWrapper<SysDeptEventType> qw = new QueryWrapper<>();
//					qw.eq("dept_id", dept.getDeptId());
//					qw.eq("event_type", typId);
//					SysDeptEventType eventType = deptEventTypeMapper.selectOne(qw);
//					if(eventType == null){
//						eventType = new SysDeptEventType();
//						eventType.setDeptId(dept.getDeptId());
//						eventType.setEventType(typId);
//						ret = deptEventTypeMapper.insert(eventType);
//						if(ret <= 0){
//							throw new TransactionalException("deptEventTypeMapper insert error");
//						}
//					}
//				}
//			}
		}catch (Exception e){
			e.printStackTrace();
			throw new TransactionalException("insertDept system error");
		}
        return ret;
    }

    /**
     * 修改保存部门信息
     *
     * @param dept 部门信息
     * @return 结果
     */
    @Override
	@Transactional
    public int updateDept(SysDept dept) {
		int result = 0;
		try{
			SysDept newParentDept = getById(dept.getParentId());
			SysDept oldDept = getById(dept.getDeptId());
			if (Validator.isNotNull(newParentDept) && Validator.isNotNull(oldDept)) {
				String newAncestors = newParentDept.getAncestors() + "," + newParentDept.getDeptId();
				String oldAncestors = oldDept.getAncestors();
				dept.setAncestors(newAncestors);
				updateDeptChildren(dept.getDeptId(), newAncestors, oldAncestors);
			}
			result = baseMapper.updateById(dept);
			if (UserConstants.DEPT_NORMAL.equals(dept.getStatus())) {
				// 如果该部门是启用状态，则启用该部门的所有上级部门
				updateParentDeptStatusNormal(dept);
			}

			if(result <= 0){
				throw new TransactionalException("insertDept insert error");
			}

			//删除已经去掉的
			QueryWrapper<SysDeptEventType> qwNow = new QueryWrapper<>();
			qwNow.eq("dept_id", dept.getDeptId());
			List<SysDeptEventType> typIds = deptEventTypeMapper.selectList(qwNow);
			if(CollUtil.isNotEmpty(typIds)){
				for (SysDeptEventType type : typIds){
					int eventType = type.getEventType();
					//如果不存在，删除
					if(!dept.getEventTypeIds().contains(eventType)){
						result = deptEventTypeMapper.deleteById(type.getId());
						if(result <= 0){
							throw new TransactionalException("deptEventTypeMapper deleteById error");
						}
					}
				}
			}

			//添加不存在的
			if(CollUtil.isNotEmpty(dept.getEventTypeIds())){
				for (Integer typId : dept.getEventTypeIds()){
					QueryWrapper<SysDeptEventType> qw = new QueryWrapper<>();
					qw.eq("dept_id", dept.getDeptId());
					qw.eq("event_type", typId);
					SysDeptEventType eventType = deptEventTypeMapper.selectOne(qw);
					if(eventType == null){
						eventType = new SysDeptEventType();
						eventType.setDeptId(dept.getDeptId());
						eventType.setEventType(typId);
						result = deptEventTypeMapper.insert(eventType);
						if(result <= 0){
							throw new TransactionalException("deptEventTypeMapper insert error");
						}
					}
				}
			}
		}catch (Exception e){
			e.printStackTrace();
		}
        return result;
    }

    /**
     * 修改该部门的父级部门状态
     *
     * @param dept 当前部门
     */
    private void updateParentDeptStatusNormal(SysDept dept) {
		String ancestors = dept.getAncestors();
		Long[] deptIds = Convert.toLongArray(ancestors);
        update(null, new LambdaUpdateWrapper<SysDept>()
                .set(SysDept::getStatus, "0")
                .in(SysDept::getDeptId, Arrays.asList(deptIds)));
    }

    /**
     * 修改子元素关系
     *
     * @param deptId 被修改的部门ID
     * @param newAncestors 新的父ID集合
     * @param oldAncestors 旧的父ID集合
     */
    public void updateDeptChildren(Integer deptId, String newAncestors, String oldAncestors) {
        List<SysDept> children = list(new LambdaQueryWrapper<SysDept>()
                .apply("find_in_set({0},ancestors)",deptId));
        for (SysDept child : children) {
            child.setAncestors(child.getAncestors().replaceFirst(oldAncestors, newAncestors));
        }
        if (children.size() > 0) {
            baseMapper.updateDeptChildren(children);
        }
    }

    /**
     * 删除部门管理信息
     *
     * @param deptId 部门ID
     * @return 结果
     */
    @Override
    public int deleteDeptById(Integer deptId) {
        return baseMapper.deleteById(deptId);
    }

    /**
     * 递归列表
     */
    private void recursionFn(List<SysDept> list, SysDept t) {
        // 得到子节点列表
        List<SysDept> childList = getChildList(list, t);
        t.setChildren(childList);
        for (SysDept tChild : childList) {
            if (hasChild(list, tChild)) {
                recursionFn(list, tChild);
            }
        }
    }

    /**
     * 得到子节点列表
     */
    private List<SysDept> getChildList(List<SysDept> list, SysDept t) {
        List<SysDept> tlist = new ArrayList<SysDept>();
		for (SysDept n : list) {
			if (Validator.isNotNull(n.getParentId()) && n.getParentId().longValue() == t.getDeptId().longValue()) {
				tlist.add(n);
			}
		}
        return tlist;
    }

    /**
     * 判断是否有子节点
     */
    private boolean hasChild(List<SysDept> list, SysDept t) {
        return getChildList(list, t).size() > 0;
    }
}
